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Abstract. Tlie initial task that confronted extrasolar-planet transit surveys was to monitor enough 
stars with sufficient photometric precision and complete phase coverage. Numerous searches have 
been pursued over the last few years. Among these projects are shallow, intermediate, and deep 
surveys of the Galactic plane, and monitoring of open clusters, and a globular cluster. These projects 
have all defeated the initial technical challenge, but a new obstacle has risen in its place: Single-color 
photometric time series are not sufficient to identify uniquely transiting planet systems, as eclipsing 
binary stars can mimic the signal. Multicolor photometric time series and multi-epoch spectroscopic 
monitoring are required to cull the list of candidates prior to high-precision radial velocity monitor- 
ing. I also discuss the prospects for detecting another transiting system among the planets found by 
the radial-velocity method, as well as review the recent announcement of OGLE-TR-56 b, the first 
extrasolar planet detected by the transit method. 



1. Introduction 

Among the many great changes invoked by the Mayor and Queloz (1995) detec- 
tion of the planet orbiting 51 Pegasi were those concerning the potential use of 
photometric transits to detect and characterize extrasolar planets. Prior to 51 Peg b, 
several papers (Rosenblatt, 1971; Borucki and Summers, 1984; Borucki et al., 
1985; Giampapa et al., 1995) had outlined the chief obstacle facing the transit 
method: Ground-based photometry was likely to succeed only for gas-giant plan- 
ets, yet such planets were expected only at large distances. Even if all Sun-like stars 
had a Jupiter, transiting systems would be rare (only 1 in 1000 systems would have 
the inclination to transit), and, worse yet, the transit event in such systems would 
occur only once per 12-year orbital period. 

In contrast to this scenario, there are now more than 20 active transit surveys 
(see Horne, 2003 for a complete listing*), nearly all of which are focussed on 
detecting analogs of 51 Peg (which I shall refer to here as hot Jupiters). I remind 
the reader briefly of the characteristics of the signal the transit searchers seek: The 
amplitude of the flux decrement is roughly {Rp/R^Y — 0.01, where Rp is the radius 
of the planet, and R^, is that of the star. Transits occur once per 3-7 day orbital 
period, and last 2-4 hours. The rate of occurrence of hot Jupiters for Sun-like stars 

* See also http://star-www.st-and.ac.uk/~kdhl/transits/table.html, maintained 
by K. Horne 



k.^ Space Science Reviews 00: 1-12, 2008. 

5^ © 2008 Kluwer Academic Publishers. Printed in the Netherlands. 
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is currently estimated at r = 0.0075 (Butler et al., 2001), and the likelihood of a 
hot Jupiter system with a semi-major axis a presenting a transiting inclination is 
p ~ (R^/a) ~ 0.1 (for a uniform distribution of orbital inclinations). Assuming that 
complete phase coverage is achieved, the number of stars that must be examined 
to find one transiting hot Jupiter system is n = l/{r p g) 1300/^, where g is the 
fraction of stars examined that are "good" targets, i.e. Sun-like and not members 
of a close binary. 



2. Photometry of Stars with Doppler-Detected Planets 

Numerous groups have performed high-precision photometry on the known plan- 
etary systems with the smallest semi-major axes, and transits by gas-giant ob- 
jects have been ruled out (in order of increasing semi-major axis) for HD 83443 
(S. Udry, personal communication), HD 46375 (Henry, 2000), HD 179949 (Tinney 
et al, 2001), HD 187123 (Castellano, 2000), X Boo (Bahunas et al., 1997; Henry 
et al, 2000), BD- 10° 3 166 (Butler et al, 2000), HD 75289 (S. Udry, personal com- 
munication), 51 Peg (Henry et al., 1997; Henry et al., 2000), D And b (Baliunas et 
al., 1997; Henry et al., 2000), HD 49674 (Butler et al, 2002), HD 168746 (Pepe et 
al., 2002), HD 108147 (Pepe et al, 2002) & 55 Cnc b (Bahunas et al, 1997; Henry 
et al., 2000). 

It is worthwhile to consider whether these non-detections are consistent with 
our expectations. If the probability of a transiting configuration is p, then the 
probability of finding k transiting systems of n stars examined is P = nl/[kl{n — 
k)l]{l —pY~^p'^. If we assumed that each of the 14 systems that were monitored 
(HD 209458 and the 13 listed above) had a probability of presenting transits of 
p ~ Rj,/a ~ 0.1 (for the Sun, this corresponds to a semi-major axis of 0.047 AU), 
then the chance of finding one (and only one) transiting system is 0.36. The chance 
of having found no such systems is 0.23. On the other hand, the chances of hav- 
ing found 2 or 3 such systems are 0.26 and 0.11 respectively. Any of these out- 
comes would have been roughly consistent with a uniform distribution of orbital 
inclinations (and the scenario that materialized was the single most likely one). 

We needn't assume a uniform value of /? = 0.1 for all systems; we can es- 
timate from parallax measurements (or stellar modeling), and a is calculated 
from the radial velocity period and an estimate of the stellar mass M*. Exclud- 
ing HD 209458, one can then ask what the probability was of examining the 
other 13 systems and finding no transits. This value is given hy P = nEi (1 ~ 
R^^i/ai) ~ 0.26 (where I have assumed values for 7?^, gathered from the literature). 
This number is also consistent with a uniform distribution of orbital inclinations. 

It is reasonable to ask whether photometric monitoring of additional systems 
is worthwhile. Such observing campaigns are increasingly difficult for longer pe- 
riods, as the transits are more infrequent, and the uncertainties in the predicted 
times of the events are greater. With these considerations in mind, G. LaughUn 
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has established a project* to motivate amateur astronomers to pursue the most 
promising of the remaining extrasolar planet systems. The requisite photometric 
precision can be achieved with amateur-grade, commercially-available CCD cam- 
eras. Amateur telescopes provide more than enough aperture to gather the requisite 
flux (recall that Charbonneau et al., 2000 used a 10 cm aperture Schmidt camera to 
record the first transits of HD 209458), although the paucity of sufficiently bright 
calibrator stars in the typical field-of-view of such instruments can be a problem. 
This network has recently claimed to rule out transits for HD 217107 (Fischer et 
al, 1999). There are 24 extrasolar planets with periods less than 200 days that have 
not yet been examined for transits. For this sample, the probability of at least one 
transiting system is P = 1 — 0^=1 (1 —R*^i/ai) ~ 0.62 (using values forR^ as listed 
at the project website). 

Photometric monitoring of Doppler-detected planet systems is also a useful 
check that the radial velocity variations are due to an orbiting planet, and not 
intrinsic stellar variability. Recently, Henry et al. (2002) presented photometry of 
HD 192263 showing variability at the RV period, and casting the planet interpreta- 
tion (Santos et al., 2000; Vogt et al., 2000) into doubt. 

Although there may be a few more transiting planets in the current radial veloc- 
ity sample, the ongoing Doppler surveys will not provide a substantial population 
of such objects. The primary goal of these surveys is to characterize the planet 
population at large semi-major axes. As a result, these surveys will continue to 
monitor the current target list (comprising some 1500 stars) for many years to 
come, but will not add many new targets. Since hot Jupiters are the most quickly 
and easily detected, the current Doppler precision of 3 ms~^ has likely revealed the 
majority of such objects with masses greater than 0.2 Mjup in the current target list. 
The desire for a large number of transiting hot Jupiters, and the realization that the 
current Doppler surveys are unlikely to provide this sample, motivates the various 
transit searches that are the subject of the remainder of this paper. 



3. Radial Velocity FoUow-Up of Transit Candidates 

Transiting extrasolar planets are of substantial value only if the radial velocity 
orbit can be measured. Since the current transit surveys target stars ranging in 
brightness from 9 < V < 21, it is worthwhile to consider the resources that will be 
required to accomplish this follow-up measurement once candidate systems have 
been identified. 

For typical Sun-hke stars with rotational velocities at or below a spectrograph 
resolution R, the Doppler precision may be roughly estimated by (Brown, 1990): 

R d {Niines Npi^ IcY'^ 
* See http : //www . transitseeirch . org, maintained by G. Laughlin. 
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where c is the speed of light, d is the typical fractional line depth (relative to the 
continuum), Ic is the continuum intensity per pixel, Nums is the number of spectral 
lines, and Npix is the number of pixels per line. As an example, consider the preci- 
sion that may be expected from the HIRES spectrograph on the Keck I telescope: 
Assuming d = 0.4, Npix = 2, and Nums = 100, and a resolution R = 70 000 and 
count level 4 = 90 000 (corresponding to a 5 minute exposure of a late G star at 
V = 8), then the formula above yields dvrms = 2.5 ms~^ G. Marcy (personal com- 
munication) reports typical photon-limited Doppler errors of 3 ms~' for 5 minute 
integrations on V=8 G-dwarf stars, in keeping with this estimate. (In practice, the 
achieved Doppler precision results from the use of more lines than that assumed 
here, at a variety of line depths and signal-to-noise ratios). 

For radial-velocity follow-up of stars with candidate transiting planets, we are 
interested to know how much telescope time tgbs will be required to detect (or 
exclude) a secondary mass Mp orbiting a star of mass with a period P. To 
derive this relation, I start with amplitude of the radial velocity signature induced 
on the primary, 

/2 7lG\5 _| 

= —— Mpsini \ (2) 



Equation 1, and the experience of the radial velocity observers, tells us that a 
precision of 3 ms~Ms obtained with Keck/HIRES in 5 minutes on a y = 8 star. I 
assume that the Doppler precision is photon-noise-limited, and that the amplitude 
must exceed 4 times the precision to be secure (in keeping with the rule-of-thumb 
suggested by Marcy et al., 2000). Equating these requirements. 



Kit ^ - 1 / Inhi \ . - V-8 



— = bVrms = 3 ms" 



o imn/ 



(3) 



I solve for the required integration time. 

Equation 4 makes it clear that the required integration time is very sensitive to 
the planetary mass and the stellar brightness (as one would expect). It is important 
to avoid the temptation to assume Mp = 1 Mjup in calculating tgbs- Of the 17 planets 
with a < 0.1 AU, 70% have masses below 1 Mjup, and the median mass is 0.5 Mjup. 
Thus if one adopts the value of r = 0075 (see §1) in planning a transit search, one 
should also adopt a mass of 0.2 Mjup in calculating the required tots with equation 4. 
The result is to increase the predicted integration times by a factor of 25. 
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4. A Selection of Transit Surveys 

While it is not possible here to review all current transit searches, I have selected 
four surveys which straddle the range of current efforts. I briefly review the status of 
the projects, before summarizing the prospects for Doppler (and additional) follow- 
up observations of candidates yet-to-be identified by these surveys. 

4.1. Shallow, Wide- Angle Surveys 

Working with J. T. Trauger's team at NASA/JPL, I have assembled a small-aperture 

wide-field transit-search instrument (Figure 1) that typifies many extant systems, 
such as STARE (Brown and Charbonneau, 2000) and Vulcan (Borucki et al., 2001). 
The system (with the exception of the primary CCD camera) is built entirely of 
commercially-available items typically intended for amateur use. 1 describe the 
basic features here for the benefit of those readers contemplating the fabrication 
of a similar system. The main optic is an f/2.8 280mm camera lens imaging a 
5.7° X 5. 7° patch of the sky onto an 2kx2k thinned CCD. A micrometer allows 
for automated focus adjustments. Each CCD pixel is 13.5^m, corresponding to 
10 arcsec. A filter wheel houses the SDSS g', r', i', z' and Bessell R filters. For 
guiding, an f/6.3 440mm lens feeds a commercial prepackaged CCD guide camera. 
The system is mounted in an equatorial fork mount, and housed in a refurbished 
clamshell enclosure at Mt. Palomar in southern California. All systems are operated 
by a single Linux-based workstation, and a command script guides the instrument 
through each night's observing. 

This system is the third in a network: The other two instruments are STARE (PI: 
T. M. Brown), located in the Canary Islands, and PSST (PI: E. W. Dunham), located 
in northern Arizona. Each telescope produces a time series of R-band images (with 
typical integration times of 2 minutes), and only one field is monitored for a typical 
observing campaign of 2 months. We perform weighted-aperture photometry on 
these images to produce a photometric time series for each star. (Image subtrac- 
tion methods, such as those as described by Alard and Lupton, 1998, are unUkely 
to result in a significant increase in precision because the 10 arcsec pixels yield 
slightly undersampled and seeing-independent images). In a typical field-of-view 
centered on the Galactic plane, roughly 6000 stars (9 < V < 1 1) are monitored with 
sufficient accuracy to detect periodic transit-like events with an amphtude of 1%. 

For a single telescope, the primary losses in efficiency are due to the day-night 
cycle, and weather. Currently the telescopes are operated as stand-alone systems 
monitoring the same field-of-view. Once networked so that the time series are com- 
bined prior to performing the search for transit-like signals, we expect a substantial 
increase in efficiency. Specifically, we anticipate that the 2 months required by a 
single instrument to achieve 85% completion (for orbital periods less than 4.5 days) 
can be reduced to only 3 weeks (Figure 2) with the current longitudes afforded by 
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Figure 1. South-facing (left panel) and north-facing (right panel) views of the Palomar planet search 
instrument. The primary imaging lens is on the left side of the camera as shown in the right panel; 
a 280mm f/2.8 commercial lens images a 5.7° x 5.7° patch of the sky onto an 2kx2k thinned CCD. 
The system is assembled almost entirely from amateur-grade, commercially-available parts, with the 
exception of the primary CCD camera. 



the three sites. Since fields are exhausted much more quickly, the number of stars 
monitored in a year of operation is greatly increased. 

4.2. Intermediate Galactic Plane Surveys - OGLE III 

The team operating the Optical Gravitational Lensing Experiment has conducted 

a search for low-amplitude transits in three fields in the direction of the Galactic 
center (Udalski et al, 2002a; Udalski et al., 2002b). They obtained 800 /-band 
epochs per field spanning 32 nights. More than 5 million stars were monitored, to 
which they applied a substantial cut in color-magnitude space to reduce the number 
of targets to 52 000 disk stars (14 < V < 18) with photometry better than 1.5%. Of 
these, 59 candidates were identified with flat-bottomed eclipses with depths less 
than 8%. 

Dreizler et al. (2002) presented spectroscopy of some of these candidate stars, 
with the goal of obtained secure spectral classifications. The stellar radii they in- 
ferred allowed them to calculate more accurate radii of the transiting objects. In 
many cases, the OGLE-HI objects had radii that were too large for planet-mass 
bodies. 

After a similar (but independent) spectroscopic reconnaissance, Konacki et al. 
(2003) found that 6 of the candidates had solar-type spectra with no radial- velocity 
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Figure 2. The upper panel shows the recovery rate for a 3-week campaign to find transiting planets 
(assuming 9 hours per night, and 66% clear weather), as a function of orbital period. Three half 
transits are required. The dashed line is the result for a single telescope, the dotted line is that for three 
telescopes at the same longitude, and the solid line is that for a 3-element network with a telescope 
in each of the Canary Islands, Arizona, and California. The lower panel shows the corresponding 
recovery rates for a 2-month campaign with the same night length and weather. In both panels, the 
network has nearly exhausted the field (and hence a new field can be monitored, increasing the total 
number of targets), whereas both the single-element and single-longitude systems are still lacking 
significant phase coverage. 
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variation at the level of a few kms^ . Subsequent radial velocity monitoring with 
Keck/HIRES revealed that one candidate, OGLE-TR-56, showed a velocity change 
with an amplitude of 167 ms~^ and consistent with the 1.2-day photometric vari- 
ation. The team performed numerous modeling tests to rule out spectral blends 
(a significant concern, as the OGLE-III fields are very crowded), leading them to 
announce the first detection of an extrasolar planet by the transit method. The new- 
found planet has a mass Mp = 0.9 ± 0.3 Mjup and radius Rp = 1.3 ±0.15 Rjup, and 
hence a density of p = 0.5 ± 0.3 gcm~^, similar to the more precise estimates for 
HD 209458 b (Brown et al, 2001). The current radial- velocity phase coverage is 
sparse, but will likely be filled in during the 2003 bulge season. The most surprising 
result is the 1.2-day orbital period. The Doppler surveys have found no orbital 
periods below 2.99 days, and a large pile-up of objects at this value (8 planets with 
periods less than 4 days). 

4.3. Deep Galactic Plane Surveys - EXPLORE 

The deepest transit search currently underway is the EXPLORE project (Mallen- 
Ornelas et al., 2002; Yee et al., 2002). The EXPLORE team conducts observing 
campaigns (lasting typically 2 weeks) using the CTIO 4-m and CFHT 3.6-m tele- 
scopes to continuously monitor fields in the Galactic plane in /-band. EXPLORE-I 
(southern hemisphere) received 11 nights in 2001 and delivered a photometric 
precision of better than 1% on 37 000 stars with 14.5 < / < 18.2. EXPLORE-E 
(northern hemisphere) received 14 nights in 2001 and delivered a similar pho- 
tometric precision of better than 1% on 9500 stars. Both surveys acquired data 
with a similar sampling interval of 2.7 minutes. The team has identified several 
candidates, and spectroscopic follow-up has been conducted on VLT/UVES and 
Keck/HIRES. 

The primary benefit of the EXPLORE campaign is that they will probe a signif- 
icant number of low-mass (K & M) main sequence stars. This is in contrast to the 
wide-field surveys, which will probe mostly F & G stars (as less massive stars are 
not a significant fraction of the V < 1 1 population). The principal challenge facing 
EXPLORE is that even preliminary follow-up radial velocity monitoring (i.e. with 
the goal of ruling out eclipsing binary star systems) is very resource intensive, 
requiring 8-m class telescopes. 

4.4. Open Cluster Surveys - PISCES 

The identification of open clusters as good targets for transit searches was pointed 
out by Janes (1996). Open clusters offer ideal laboratories in which to study the 
characteristics of hot Jupiters, since the stars share a common metallicity and age. 
The search for transiting planets in open clusters is motivated in part by the con- 
clusion by Gilliland et al. (2000) that the population of hot Jupiters in the globular 
cluster 47 Tuc is greatly depleted relative to the local solar neighborhood. Two 
of the many contending explanations for this result are (1) the low-metallicity 



CURRENT CHALLENGES FACING PLANET TRANSIT SURVEYS 



9 



environment results in a reduced formation and/or migration rate of Jupiter-mass 
planets, or (2) protoplanetary disks are tidally disrupted by the close passage of 
stars in the crowded environment of a globular cluster. Open clusters offer envi- 
ronments at a range of metallicities, yet are not crowded enough for disruption 
by stellar encounters to be significant. There is an additional benefit for searching 
for transiting planets in open clusters: interpretation of candidates is greatly sim- 
plified, since the stellar radius and mass can be reliably assumed from the cluster 
color-magnitude diagram. 

Mochejska et al. (2002) present results of a month-long campaign on the open 
cluster NCG 6791. They demonstrate adequate photometric precision for the de- 
tection of hot Jupiters, and present lightcurves for 62 variable stars (but no planet 
candidates). The challenges facing their survey are representative of those for other 
open-cluster searches (e.g. Street et al., 2002): Open clusters typically contain 
several thousand stars, and thus would yield only a handful of detections even if 
complete phase coverage can be obtained. Specifically for Mochejska et al. (2002), 
NGC 6791 has roughly 10 000 member stars, of which 4110 (59%) and 2053 (29%) 
have sufficient photometric precision to detect transits for planets with radii of 1.5 
and 1.0 /?jup, respectively. Furthermore, these stars are very faint (17 <R< 21), 
and thus even preliminary follow-up spectroscopy (i.e. with the goal of ruUng out 
eclipsing binary star systems) will likely require 8-m class telescopes. 



5. The Task at Hand 



Several years ago, the principal technical challenge facing proposed transit surveys 
could be summarized in the following question: Could enough stars ('--'10 000) 
be surveyed with sufficient precision (~ 3mmag) and for enough nights to obtain 
complete phase coverage? The good news is that the answer to this question is a 
definite yes, as evidenced by the diversity of projects described in §4. However, a 
new challenge has arisen, which I will broadly describe as sorting out the "false 
positives". Single-color photometric time series alone are not sufficient to identify 
uniquely the transiting-planet systems. There are at least three general forms of 
apparent variability that can mimic these signals, all of which involve an eclipsing 
binary star system. The first is grazing incidence equal-size stellar binaries, such 
that the occulted area is roughly 1 % (and the period is underestimated by a factor 
of 2). In general, this contaminant can be ruled out by sufficiently precise and 
rapid photometric observations during transit, as grazing incidence binaries will 
present a V-shaped (as opposed to a flat-bottomed) eclipse. The second contam- 
inant is a central transit by a smaller star in front of a larger one. Multi-epoch 
low-precision (~ kms~') radial- velocity monitoring would identify such systems, 
as the amplitude of the radial velocity orbit would be orders of magnitude larger 
than that expected for a hot Jupiter. The third and most insidious contaminant is a 
stellar blend, where an eclipsing binary (with central transits) has its ecUpse depth 
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diluted down to by the light of a third star (either physically associated, or 
simply lying along the line of sight). In general, multi-color photometry of such a 
system should reveal a color-dependent transit depth, whereas the transit depth for 
a hot- Jupiter system should vary only slightly (due to the effects of stellar Umb- 
darkening). For examples of such systems, and follow-up spectroscopy revealing 
their true (non-planetary) nature, see Borucki et al. (2001). 

In summary, most contaminating systems can be rejected by either (1) rapid- 
cadence, multi-color photometry of the transit curve revealing either a V-shaped 
eclipse, or a large color-dependence to the transit depth, or (2) multi-epoch spec- 
troscopy revealing large Doppler variations, consistent with a massive secondary. 

Transiting planets are of significant value only if both their mass and radius can 
be estimated. Moreover, the reality of putative planets discovered by transit pho- 
tometry but without a measured radial-velocity orbit may be doubted. Conversely, 
the detection of a radial-velocity orbit at the same period and phase as the ones 
derived from photometry is strong evidence supporting the planet interpretation. 

As an illustration of the dramatic effects of target brightness on the prospects for 
detecting the radial velocity orbit, consider Keck/HIRES observations of stars with 
V = 10.5 (typical brightness for a target star in the wide-angle surveys), V = 15.3 
(the brightness of OGLE-TR-56) and V = 18 (faint star in a cluster survey or deep 
Galactic plane search). Using equation 4, at V = 10.5, a detection of a 0.2 Mjup 
planet can be achieved with integrations of only 10 minutes. For OGLE-TR-56 
(Mp = 0.9 Mjup, P = 1.2 d), integrations of 20 minutes are required (indeed, this is 
close to what Konacki et al., 2003 used). However, less massive planets at longer 
orbital periods (Mp = 0.5 Mjup, P = 3 d) are a challenge, requiring 2 hours of 
integration per measurement. At V = 18, the situation is very difficult indeed: A 1- 
hour integration yields a detection limit of only 2.5 Mjup for a 3-day orbital period. 
A planet with a mass of 1 Mjup would require more than 6 hours of integration 
per observation (and recall than most of the known hot Jupiters have masses below 
1 Mjup). In summary, radial velocity measurements are straightforward for the typ- 
ical targets in the wide-angle surveys, challenging but feasible for the intermediate 
galactic plane surveys (targets brighter than V = 16), and unlikely to succeed for 
targets toward the faint end of the deep Galactic plane searches, and some open 
cluster surveys. Finally, it is important to note another strong reason to favor bright 
stars: Many follow-up measurements of HD 209458 are now being vigorously pur- 
sued (see Charboimeau, 2003 for a summary), and most of these are photon-noise 
limited. While some of these techniques may be feasible for candidates emerging 
from the wide-angle surveys (with stars typically 10 times fainter than HD 209458), 
they are unlikely to approach a useful precision for fainter stars. 
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1. Implementation 
1 \ProvidesFile{klu9.clo}[\f iledate ] 
1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9.5, 9/11, 10/12, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcoimnand\normalslze{'/, 

3 \@setf ontsize\normalsize\@ixpt{ll}'/, 

4 \abovedisplayskip 8.5\p(S \aplus3\pS \Sminus4\pS 

5 \abovedisplayshortskip \za \aplus2\p(3 

6 \belowdisplayshortskip 4\p(S \aplus2\p® \@minus2\pS 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\QlistI} 

9 Xnormalsize 

10 \newconmiand\small{'/, 

11 \asetf ontsize\small\(avliipt{9 . 5}'/, 

12 \abovedisplayskip 6\p(S \(Splus2\p@ \aininus4\pQ 

13 \abovedisplaysliortskip \z® \®plus\pa 

14 \belowdisplayshortskip 3\p8 \Splus\pa \Sminus2\p@ 
16 \def \Slisti{\leftmargin\leftmargini 

16 \topsep 3\pa \Qplus\pa \aminus\pa 

17 \parsep 2\pa \Splus\pa \aminus\pa 

18 \itemsep Xparsep}"/. 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newconmiand\f ootnotesize{'/, 

22 \@setf ontsize\f ootnotesize\aviipt{8}7, 

23 \abovedisplayskip 4\p@ \@plus2\p@ \aininus2\pa 

24 \abovedisplayshortsklp \za \aplus\pa 

25 \belowdisplayshortskip 2\pa \aplus\pa \aminusl\p® 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pS \aplus\pS \Sminus\pS 

28 \parsep INpS \aplus\pS \aminus\pS 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcoimiiaiid\scriptsize{\asetf ontsize\scriptsize\avipt\®viipt} 

33 \newcoiimaiid\little{\asetf ontsize\little\avpt\avipt} 

34 \newconmiaiid\tiny{\asetf ontsize\tiny\avpt\avipt} 

36 \newconmand\large{\Qsetf ontsize\large\axpt\8xiipt} 

36 \newcoiimaiid\Large{\Ssetf ontsize\Large\exiipt{14}} 

37 \newcoiimaiid\LARGE{\asetf ontsize\LARGE\®xivpt{18}} 

38 \newconmand\huge{\asetf ontsize\huge\axviipt{22}} 

39 \newconmand\Huge{\asetf ontsize\Huge\axxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-liii} 

41 \setlength\vof f set{-lin} 

42 \setlength\par indent {14\pa} 

43 \setlength\headlieight{12\pS} 
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44 \setlength\headsep •{12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\pa} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\pa} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt]- 

53 \setlength\f boxsep{3pt} 
64 \setlength\fboxrule{.4pt} 

1.3. Textheight and TEXTWIDTH 

These axe the main reason for the existence of these files. For some stupid reason, I^TJ^X calculates 
textwidth out of \paperwidth.. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth arc set iu the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}7, 

58 \addtolength\atempdima{-\textwidth}y, 

59 \divide\atempdlma by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\atempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}y, 

63 \ifdlm \atempdima <\atempdimb 

64 \esettopoint\atempdimb 

66 \GenericError{Polntsize}{Pointsize Error: Marginpars disabled]-{]-{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide. \MessageBreak 

68 The allowed value for margin space: (\the\Stempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }•/. 

74 \marginparwidth \zS 

75 \marginparsep \za 
7B \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\Stempdimb) . Please press X and try again. 
86 }•/. 

86 \f i 

87 \oddsidemargin \atempdima 

88 \evensidemargin \9tempdima 
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These calculations arc a lot easier, \textheight should have been set already. This does not 
check for the correct placcrrieut of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\@tenipdinia{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima)- 

94 \addtolength\atempdima{-\textheight}- 

95 \dlvlde\@tempdlma by 2 

96 \ifdlm \@tempdlma <2pc 

97 \advaiice\8tempdimb by -4pc 

98 \Ssettopoint\Stempdimb 

99 \GenericError{Polntslze}{Pointsize Error: Invalid sizes glven}{}{You 

100 made your \string\textheight\space (\the\texthelght) 

101 more than the available total . \MessageBreak 

102 (Which Is: \the\Stempdlmb) . Please press X and try again. 

103 }"/. 

104 \fi 

105 \setlength\topmargin{\Stempdima} 

106 \setlength\ldSboxhelght{\Stempdlma} 

107 \advance\ldSboxhelght by -2pc 

108 } 

109 \setlength\footnotesep{6\pS} 

110 \setlength{\skip\footlns}{9\pS \®plus 4\pa XSmlnus 2\pa} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\pQ \9plus l\pQ \9mlnus l\pS} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\leftmarginil}{2em} 

114 \setlength{\lef tmargini 1 1}{ 1 . 7em} 

115 \setlength{\lef tmarginiv}-[l .4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 
lis \setlength{\labelsep}{.4eiii} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwldth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 8\pS \Splus2\pa \Sminus2\pa 

124 \partopsep 2\pS XSplus l\pa \aminus l\pa 

125 \itemsep 4\pa \aplus 2\pS \aminus l\pa 

126 \parsep 4\p@ \Splus 2\pe \Sminus l\pa } 

127 \def \aiistii{*/. 

128 \leftmargin \lef tmargini! 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \aplus 2\pa XSmlnus l\p9 

132 \parsep 2\pa \@plus INpS \@minus l\p9 

133 \ltemsep \parsep} 
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134 Ndef \Slistiii-['/. 

136 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \aplus l\p9 \9minus INpS 

139 \parsep XzO 

140 Npartopsep l\pS XOplus 0\pS \Sminus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{*/. 

143 \setlength{\lef tmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\leftmargin}{\leftmarginv}°/, 

148 \setlength{\labelwidth}{\leftmarginv}°/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \Slistvi{% 

151 \setlength{\leftmargin}{\leftmarginvi}'/. 

152 \setlength{\labelwidth}{\lef tmarginvi}'/, 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 

155 \Slisti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{10\pa \(Splus 2\pa XOminus 2\pa} 

157 \setlength\textf loatsep{18\pa \aplus 2\pa \aminus 4\pa} 

158 \setlength\intextsep{10\pa \aplus 2\pa \aminus 2\pa} 

159 \setlength\dblf loatsep{10\pa \aplus 2\pa Xaminus 2\pa} 

160 \setlength\dbltextf loatsep{18\pa \®plus 2\pa \®minus 4\pe} 

Separation on float pages 

161 \setlength\afptop{0\pa \aplus if il} 

162 \setlength\afpsep{8\pa \aplus 2f il} 

163 \setlength\afpbot{0\pa \aplus If il} 

164 \setlength\adblfptop{0\pa \aplus If il} 

165 \setlength\adblfpsep{8\pa \@plus 2f il} 

166 \setlength\adblfpbot{0\p8 \8plus If il} 
167 

168 \endinput 



klut9.clo 



Abstract. This internal file takes care of list definitions and 'general' point size options. This is a 'tight' file. 



Kluwer Academic Publishers 
■ 1998/02/11 

o ■ 

(N 
X) 

Table of Contents 

1 Implementation 2 
1.1 Section size commands 2 
^ ' 1.2 Various values 2 

1.3 Textheight and textwidth 3 

1.4 Lists 4 



' 1.5 Float separation parameters 5 

o ■ 
cn 
o 

o 

> 



© 2008 Kluwer Academic Publishers. Printed in the Netherlands. 



2 



1. Implementation 
1 \ProvidesFile{klut9.clo}[\f iledate ] 
1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcoimnand\normalslze{'/, 

3 \@setf ontsize\normalsize\@ixpt{10 . 5}'/. 

4 \abovedisplayskip 8.5\p(S \aplus3\pS \Sminus4\pS 

5 \abovedisplayshortskip \za \aplus2\p(3 

6 \belowdisplayshortskip 4\p(S \aplus2\p® \Sminus2\pS 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\QlistI} 

9 Xnormalsize 

10 \newconmiand\small{'/, 

11 \asetf ontsize\small\(avliipt{9}'/, 

12 \abovedisplayskip 6\p(S \(Splus2\p@ \aininus4\pQ 

13 \abovedisplaysliortskip \z® \®plus\pa 

14 \belowdisplayshortskip 3\p8 \Splus\pa \Sminus2\p@ 
16 \def \Slisti{\leftmargin\leftmargini 

16 \topsep 3\pa \Qplus\pa \aminus\pa 

17 \parsep 2\pa \Splus\pa \aminus\pa 

18 \itemsep Xparsep}"/. 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newconmiand\f ootnotesize{'/, 

22 \@setf ontsize\f ootnotesize\aviipt{8}7, 

23 \abovedisplayskip 4\p@ \@plus2\p@ \aininus2\pa 

24 \abovedisplayshortsklp \za \aplus\pa 

25 \belowdisplayshortskip 2\pa \aplus\pa \aminusl\p® 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pS \aplus\pS \Sminus\pS 

28 \parsep INpS \aplus\pS \aminus\pS 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcoimiiaiid\scriptsize{\asetf ontsize\scriptsize\avipt\®viipt} 

33 \newcoiimaiid\little{\asetf ontsize\little\avpt\avipt} 

34 \newconmiaiid\tiny{\asetf ontsize\tiny\avpt\avipt} 
36 \newconmand\large{\Qsetf ontsize\large\8xpt{ll .5}} 

36 \newcoiimaiid\Large{\Ssetf ontsize\Large\exiipt{14}} 

37 \newcoiimaiid\LARGE{\asetf ontsize\LARGE\®xivpt{18}} 

38 \newconmand\huge{\asetf ontsize\huge\axviipt{22}} 

39 \newconmand\Huge{\asetf ontsize\Huge\axxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-liii} 

41 \setlength\vof f set{-lin} 

42 \setlength\par indent {14\pa} 

43 \setlength\headlieight{12\pS} 



3 



44 \setlength\headsep •{12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\pa} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\pa} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt]- 

53 \setlength\f boxsep{3pt} 
64 \setlength\fboxrule{.4pt} 

1.3. Textheight and TEXTWIDTH 

These axe the main reason for the existence of these files. For some stupid reason, I^TJ^X calculates 
textwidth out of \paperwidth.. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth arc set iu the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}7, 

58 \addtolength\atempdima{-\textwidth}y, 

59 \divide\atempdlma by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\atempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}y, 

63 \ifdlm \atempdima <\atempdimb 

64 \esettopoint\atempdimb 

66 \GenericError{Polntsize}{Pointsize Error: Marginpars disabled]-{]-{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide. \MessageBreak 

68 The allowed value for margin space: (\the\Stempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }•/. 

74 \marginparwidth \zS 

75 \marginparsep \za 
7B \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\Stempdimb) . Please press X and try again. 
86 }•/. 

86 \f i 

87 \oddsidemargin \atempdima 

88 \evensidemargin \9tempdima 
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These calculations arc a lot easier, \textheight should have been set already. This does not 
check for the correct placcrrieut of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\@tenipdinia{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima)- 

94 \addtolength\atempdima{-\textheight}- 

95 \dlvlde\@tempdlma by 2 

96 \ifdlm \@tempdlma <2pc 

97 \advaiice\8tempdimb by -4pc 

98 \Ssettopoint\Stempdimb 

99 \GenericError{Polntslze}{Pointsize Error: Invalid sizes glven}{}{You 

100 made your \string\textheight\space (\the\texthelght) 

101 more than the available total . \MessageBreak 

102 (Which Is: \the\Stempdlmb) . Please press X and try again. 

103 }"/. 

104 \fi 

105 \setlength\topmargin{\Stempdima} 

106 \setlength\ldSboxhelght{\Stempdlma} 

107 \advance\ldSboxhelght by -2pc 

108 } 

109 \setlength\footnotesep{6\pS} 

110 \setlength{\skip\footlns}{9\pS \®plus 4\pa XSmlnus 2\pa} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\pQ \9plus l\pQ \9mlnus l\pS} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\leftmarginil}{2em} 

114 \setlength{\lef tmargini 1 1}{ 1 . 7em} 

115 \setlength{\lef tmarginiv}-[l .4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 
lis \setlength{\labelsep}{.4eiii} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwldth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 8\pS \Splus2\pa \Sminus2\pa 

124 \partopsep 2\pS XSplus l\pa \aminus l\pa 

125 \itemsep 4\pa \aplus 2\pS \aminus l\pa 

126 \parsep 4\p@ \Splus 2\pe \Sminus l\pa } 

127 \def \aiistii{*/. 

128 \leftmargin \lef tmargini! 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \aplus 2\pa XSmlnus l\p9 

132 \parsep 2\pa \@plus INpS \@minus l\p9 

133 \ltemsep \parsep} 
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134 Ndef \Slistiii-['/. 

136 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \aplus l\p9 \9minus INpS 

139 \parsep XzO 

140 Npartopsep l\pS XOplus 0\pS \Sminus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{*/. 

143 \setlength{\lef tmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\leftmargin}{\leftmarginv}°/, 

148 \setlength{\labelwidth}{\leftmarginv}°/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \Slistvi{% 

151 \setlength{\leftmargin}{\leftmarginvi}'/. 

152 \setlength{\labelwidth}{\lef tmarginvi}'/, 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 

155 \Slisti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{10\pa \(Splus 2\pa XOminus 2\pa} 

157 \setlength\textf loatsep{18\pa \aplus 2\pa \aminus 4\pa} 

158 \setlength\intextsep{10\pa \aplus 2\pa \aminus 2\pa} 

159 \setlength\dblf loatsep{10\pa \aplus 2\pa Xaminus 2\pa} 

160 \setlength\dbltextf loatsep{18\pa \®plus 2\pa \®minus 4\pe} 

Separation on float pages 

161 \setlength\afptop{0\pa \aplus if il} 

162 \setlength\afpsep{8\pa \aplus 2f il} 

163 \setlength\afpbot{0\pa \aplus If il} 

164 \setlength\adblfptop{0\pa \aplus If il} 

165 \setlength\adblfpsep{8\pa \@plus 2f il} 

166 \setlength\adblfpbot{0\p8 \8plus If il} 
167 

168 \endinput 
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1 . Implementation 

1 \ProvidesFile{klul0.clo>[\filedate ] 
1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9.5, 9/11, 10/12, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcoimnand\normalsize{/C 



3 \@setf ontsize\normalsize\@xpt\@xiipt 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p® 

5 \abovedisplayshortskip \z(2 \(2plus 3\p@ 

6 \belowdisplayshortskip 6\p<a XOplus 3\p<a XOminusSXpO 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \iiewcommaiid\small{'/. 

11 \@setfontsize\small\@ixpt{ll}7. 

12 \abovedisplayskip 8.5\p(3 \@plus3\p@ \@ininus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p(§ 

14 Xbelowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmairginMef tmargini 

16 \topsep 4\p@ \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \(Sminus\p@ 

18 \itemsep Vpaxsep]-"/, 

19 \belowdi splay skip \abovedi splay skip 

20 } 

21 \newcommand\f ootnotesize{% 

22 \@setf ontsizeXf ootnotesize\(§viiipt{9 . 5}-°/, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \za \®plus\p@ 

25 Xbelowdisplayshortskip 3\p@ \@plus\p@ \®minus2\p@ 

26 \def\(21isti{\leftmargin\lef tmargini 

27 \topsep 3\p(S \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p(§ \@minus\p@ 

29 \itemsep Xparsep}'/. 

30 \belowdi splay skip \abovedisplayskip 

31 } 



32 \newcoiimiand\scriptsize{\(§setf ontsize\scriptsize\(3viipt\@viiipt} 

33 \rLewcommaiid\little{\@setf ontsize\little\@vipt\@viipt} 

34 \newcommaiid\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newconffliaiid\large-[\(§setf oiitsize\large\(§xiipt-[14]-} 

36 \newcomnicmd\Large{\@setf ontsize\Large\(§xivpt-[18}-} 

37 \iiewcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22>} 

38 \rLewcominaiid\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcoimnaiLd\Huge{\®setf ontsize\Huge\®xxvpt{30>} 
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1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin}- 

42 \setlength\parindent {14\p@} 

43 \setlength\heacllieight{12\p@} 

44 \setlength\headsep {12\p@}- 

45 \setlength\topskip {10\p(§> 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \ s e 1 1 engthXinar ginparpush{ 5 \p(§ > 

49 \setlength\maxdepth {.5\topskip> 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\coliiinnseprule{Opt} 

53 \setlength\f boxsep{3pt> 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and Xmarginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDociiment{y. 

57 \setlength\@tempdima{\paperwidth}7o 

58 XaddtolengthXOtempdimai-XtextwidtW/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\(§tempdimb{2pc]-y, 

63 Xifdim XOtempdima <\@teinpdiinb 

64 \@settopoint\@tempdimb 

65 \GenericError-[Poiiitsize}{Pointsize Error: Marginpars disabled}{}-[You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\Otempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreai 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 >•/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \(9tempdimb=\paperwidth 

79 \advaiice\(§tempdimb by -4pc 

80 \@settopoint\(§tempdimb 

81 \GerLericError{Poiiitsize}-{Pointsize Error: Invalid sizes given}-{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\(§tempdimb) . Please press X and try again. 

85 }"/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 Xevensidemeirgin XOtempdima 

These calculations are a lot easier, \textheight should have been set already. This does 
not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\(atempdima{-\f ootskip> 

91 \addtolength\(Stempdima{-\headheight> 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\(§tempdimb-[\@tempdima} 

94 \addtolength\@tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\(§tempdimb by -4pc 

98 \@settopoint\@tempdimb 

99 \GenericError-[Pointsize}{Pointsize Error: Invalid sizes given}"[}-{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }% 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id(§boxheight-[\(§tempdima} 

107 \advaiice\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@> 

110 \setlength{\skip\f ootins}-[9\p@ \@plus 4\p@ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus IXpQ \(Sminus IXpO} 

112 \setlength{\lef tmairgini}-[2em} 

113 \setlength{\lef tmarginii}-[2 . 2em} 
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114 \setlength{\lef tmarginiii}{l .87em} 

115 \setlength-[\lef tmarginiv]-{l . 7em]- 

116 \setlength-[\lef tmarginv}-[lem}- 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}-[.4em} 

119 \setlength-[\labelwidth}-{\lef tmargini}- 

120 \addtolength-[\labelwidth}-{-\labelsep}- 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\®listl{y. 

122 \lef tmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ XQminus 5\p<S 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p(§ \@plus 2\p@ \@minus l\p® } 

127 \def \(Slistii{"/. 

128 Meftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p(§ \@plus 2\p(3 \(§minus l\p® 

132 \pcirsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{'/. 

135 Meftmargin \lef tmarginiii 

136 Mabelwidth \leftmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \(§plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \(§plus 0\p<§ \<§minus l\p@ 

141 \itemsep \topsep} 

142 \def\01istivn 

143 \setlength-[\lef tmargin}-{\lef tmarginiv}-°/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv]-y, 

145 \addtolength-[\labelwidth}{-\labelsep}} 

146 \def \@listv[y. 

147 \setlength-[\lef tmargin}-{\lef tmarginvjy. 

148 \setlength-[\labelwidth}{\lef tmarginvjy, 

149 \addtolength-[\labelwidth}-[-\labelsep}} 

150 \def \(Slistvi{y. 

151 \setlength{\lef tmargin}-[\lef tmarginvi}% 

152 \setlength-[\labelwidth}-{\lef tmarginvijy. 

153 \addtolength-[\labelwidth}{-\labelsep}} 

154 \let\(Slisti\@listI 

155 \@listi 

1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\f loatsep{12\p(§ \(§plus 2\p(§ \(§minus 2\p(§} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p(5> 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep{12\p@ \@plus 2\p(S \(Sminus 2\p(S} 

160 \setlength\dbltextf loatsep-[20\pa XOplus 2\p® XOminus 4\p@} 

Separation on float pages 

161 \setlength\9fptop{0\p(a \@plus If il> 

162 \setlength\(§fpsep{8\p(§ \(§plus 2f il> 

163 \setlength\@fpbot-[0\p(§ \(§plus If il} 

164 \setlength\@dblfptop{0\p(§ \@plus If il> 

165 \setlength\@dblfpsep{8\p@ \<Splus 2f il> 

166 \setlengtli\<adblfpbot{0\p® \@plus If il} 

167 

168 \endinput 



klutlO.clo 
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1 . Implementation 

1 \ProvidesFile{klutl0.clo}[\filedate ] 
1.1. Section size commands 

added command: \little. This between \scriptsize and \tiiiy. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcoimnand\normalsize{/C 



3 \@setf ontsize\normalsize\@xpt{ll . 5]-7. 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p® 

5 \abovedisplayshortskip \z(2 \(2plus 3\p@ 

6 \belowdisplayshortskip 6\p<a XOplus 3\p<a XOminusSXpO 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \iiewcommaiid\small{'/. 

11 \@setf ontsize\small\@ixpt-[10 . 5}'/. 

12 \abovedisplayskip 8.5\p(3 \@plus3\p@ \@ininus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p(§ 

14 Xbelowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmairginMef tmargini 

16 \topsep 4\p(S \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p(§ \@plus\p@ \(Sminus\p@ 

18 \itemsep Xpaxsep]-"/, 

19 \belowdi splay skip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{% 

22 \@setf ontsizeXf ootnotesize\(§viiipt{9}-°/, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \za \®plus\p@ 

25 Xbelowdisplayshortskip 3\p@ \@plus\p@ \®minus2\p@ 

26 \def\(21isti{\leftmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p(§ \@minus\p@ 

29 \itemsep Xparsep}'/. 

30 \belowdi splay skip \abovedisplayskip 

31 } 



32 \newcoiimiand\scriptsize{\(§setf ontsize\scriptsize\(3viipt\@viiipt} 

33 \rLewcommaiid\little{\@setf ontsize\little\<§vipt\@viipt} 

34 \newcommaiid\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newconffliaiid\large-[\(§setf oiitsize\large\(§xiipt-[14]-} 

36 \newcomnicmd\Large{\@setf ontsize\Large\(§xivpt-[18}-} 

37 \iiewcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22>} 

38 \rLewcominaiid\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcoimnaiLd\Huge{\®setf ontsize\Huge\®xxvpt{30>} 



klutlO.clo - 1998/02/11 
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1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin}- 

42 \setlength\parindent {14\p@} 

43 \setlength\heacllieight{12\p@} 

44 \setlength\headsep {12\p@}- 

45 \setlength\topskip {10\p(§> 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \ s e 1 1 engthXinar ginparpush{ 5 \p(§ > 

49 \setlength\maxdepth {.5\topskip> 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\coliiinnseprule{Opt} 

53 \setlength\f boxsep{3pt> 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and Xmarginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDociiment{y. 

57 \setlength\@tempdima{\paperwidth}7o 

58 XaddtolengthXOtempdimai-XtextwidtW/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\(§tempdimb{2pc]-y, 

63 Xifdim XOtempdima <\@teinpdiinb 

64 \@settopoint\@tempdimb 

65 \GenericError-[Poiiitsize}{Pointsize Error: Marginpars disabled}{}-[You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\Otempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreai 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 >•/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \(9tempdimb=\paperwidth 

79 \advaiice\(§tempdimb by -4pc 

80 \@settopoint\(§tempdimb 

81 \GerLericError{Poiiitsize}-{Pointsize Error: Invalid sizes given}-{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\(§tempdimb) . Please press X and try again. 

85 }"/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 Xevensidemeirgin XOtempdima 

These calculations are a lot easier, \textheight should have been set already. This does 
not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\(atempdima{-\f ootskip> 

91 \addtolength\(Stempdima{-\headheight> 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\(§tempdimb-[\@tempdima} 

94 \addtolength\@tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\(§tempdimb by -4pc 

98 \@settopoint\@tempdimb 

99 \GenericError-[Pointsize}{Pointsize Error: Invalid sizes given}"[}-{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }% 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id(§boxheight-[\(§tempdima} 

107 \advaiice\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@> 

110 \setlength{\skip\f ootins}-[9\p@ \@plus 4\p@ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus IXpQ \(Sminus IXpO} 

112 \setlength{\lef tmairgini}-[2em} 

113 \setlength{\lef tmarginii}-[2 . 2em} 
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114 \setlength{\lef tmarginiii}{l .87em} 

115 \setlength-[\lef tmarginiv]-{l . 7em]- 

116 \setlength-[\lef tmarginv}-[lem}- 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}-[.4em} 

119 \setlength-[\labelwidth}-{\lef tmargini}- 

120 \addtolength-[\labelwidth}-{-\labelsep}- 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\®listl{y. 

122 \lef tmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ XQminus 5\p<S 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p(§ \@plus 2\p@ \@minus l\p® } 

127 \def \(Slistii{"/. 

128 Meftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p(§ \@plus 2\p(3 \(§minus l\p® 

132 \pcirsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{'/. 

135 Meftmargin \lef tmarginiii 

136 Mabelwidth \leftmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \(§plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \(§plus 0\p<§ \<§minus l\p@ 

141 \itemsep \topsep} 

142 \def\01istivn 

143 \setlength-[\lef tmargin}-{\lef tmarginiv}-°/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv]-y, 

145 \addtolength-[\labelwidth}{-\labelsep}} 

146 \def \@listv[y. 

147 \setlength-[\lef tmargin}-{\lef tmarginvjy. 

148 \setlength-[\labelwidth}{\lef tmarginvjy, 

149 \addtolength-[\labelwidth}-[-\labelsep}} 

150 \def \(Slistvi{y. 

151 \setlength{\lef tmargin}-[\lef tmarginvi}% 

152 \setlength-[\labelwidth}-{\lef tmarginvijy. 

153 \addtolength-[\labelwidth}{-\labelsep}} 

154 \let\(Slisti\@listI 

155 \@listi 



1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\f loatsep^l2\p@ \Oplus 2\p(9 \(9minus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep-[12\p@ \@plus 2\p(§ XOminus 2\p(§}- 

159 \setlength\dblf loatsep{12\p(S \@plus 2\p(S \(Sminus 2\p(S} 

160 \setlength\dbltextf loatsep{20\pa XOplus 2\p@ \iSminus 4\p@> 

Separation on float pages 

161 \setlength\@fptop-[0\p@ \@plus If il> 

162 \setlength\@fpsep{8\p@ \(§plus 2f il> 

163 \setlength\@fpbot{0\p(§ \(§plus If il} 

164 \setlength\@dblfptop-[0\p@ \®plus If il}- 

165 \setlength\(Sdblfpsep{8\p<§ \(Splus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutll.clo}[\filedate ] 
1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/12.5, 12/14, 14/18, 17/22, 
20/25, 25/30. 

2 \renewcoinmcind\normalsize-[°/o 



3 \(3setf ontsize\normalsize\(3xipt{12 . S}"/, 

4 \abovedisplayskip 10\pQ XOplus 2\pQ \Qininus5\pQ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplaysh.ortskip 6\p@ \@plus 3\p@ \@ininus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommeiiid\small-C7o 

11 \@setf ontsize\small\@xpt{ll . 5}% 

12 \abovedisplayskip 9\p@ \@plus3\p@ \(§minus4\p@ 

13 \abovedisplayshortskip \zQ \Qplus2\pQ 

14 \belowdisplayshortskip 5\p@ \(§plus2\p@ \@ininus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p(S \@plus2\p(S \(Sminus2\p(a 

17 \parsep 2\p@ \@plus\p@ \@minus\p(§ 

18 \itemsep Xparsep}"/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/o 

22 \(Ssetf ontsizeXf ootnotesize\Qixpt{10 . 5}°/, 

23 \abovedi splay skip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\pQ \Qplus\pQ \(SinirLus2\p(a 

26 \def \@listi{\leftinargin\leftmargini 

27 \topsep 3\p(§ \@plus\p@ \@minus\p@ 

28 \parsep 2\pQ \(3plus\pS \(3minus\p@ 

29 \itemsep \parsep}7. 

30 \belowdi splay skip \abovedisplayskip 

31 } 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viipt\(§viiipt3■ 
34 \newcommELnd\tiny{\@setf ontsize\tiiiy\(Svipt\(Sviipt}- 

35 \newcoinmaiid\large-[\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\(§xivpt{18}]■ 
37 \newcommand\LARGE{\asetf ontsize\LARGE\(axviipt{22}} 
38 \iiewcoinmaiid\huge{\@setf ontsize\huge\@xxpt{25» 
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39 \newcoinmaiid\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setleiigth\hof f set{-liii> 

41 \setlength\vof f set{-lin]- 

42 \setlength\parindent {14\p(a} 

43 \setleiigth\headheight{12\pQ} 

44 \setlength\headsep {12\p(a} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p(a} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p(§} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\Qiiiaxdepth\maxdepth 

51 \setlength\coluinnsep{10pt} 

52 \setleiigth\columnseprule{Opt} 

53 \setleiigth\f boxsep{3pt} 

54 \setlength\fboxrule-C.4pt} 

1.3. Textheight and TEXTWIDTH 

These are the main reason for the existence of these files. For some stupid reason, 
I^T[^ calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and Xmarginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserpr inters. 

Calculations arc done 'AtBeginDocument' to allow changes made in the preamble 

and later on in the stylefile. 

55 \newdimen\idQboxheight 

56 \AtBeginDocument{% 

57 \setlength\@tempdima{\paperwidth}7o 

58 \ addt o 1 ength\(3t empdima{ - \t extwi dth)-"/, 

59 \divide\@teinpdiina by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\Qtempdimb\marginparsep 

62 \addtolength\@teinpdiinb{2pc}°/. 

63 Xifdim \(§tempdima <\@tempdimb 

64 XOsettopointXQtempdimb 

65 \GenericError-[Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\inarginparwidth (\the\inarginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\Otempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 YL 

74 \marginparwidth \z@ 

75 \marginparsep \z(§ 

76 \fi 

77 \ifdiin \@tempdima <2pc 

78 \®tempdimb=\paperwidth 

79 \adveince\Qtempdimb by -4pc 

80 \®settopoint\®tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total NMessageBreeik 

84 (Which is: \the\®tempdimb) . Please press X and try again. 

85 }7. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \ s et length\@t empdima{ \paperhe ight } 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\(atempdima{-\headheight)- 

92 \addtolength\<§tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima]- 

94 \ addt o 1 ength\ Ot empdima{ - \t ext he ight )■ 

95 \divide\®tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\Qtempdimb by -4pc 

98 \@settopoint\Otempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-[}-{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }•/. 



104 \fi 

105 \setlength\topmargin{\9tempdima}- 

106 \setlength\id(aboxheight{\(Stempdima}- 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength-C\skip\f ootins}{9\p9 \Qplus 4\p(a XOminus 2\p(a} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ NQminus l\p@} 

112 \setlength-[\lef tniargini}-{2em3- 

113 \setlength{\lef tmarginii}-[2 . 2em} 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength-[\lef tinarginiv}{l . 7ein} 

116 \setlength{\lef tmarginv}{lein} 
117 \setlength{\lef tmarginvi}{lem} 

118 \setlength-[\labelsep>{.4ein} 

119 \setlength{\labelwidth>{\leftmargini} 

120 \addtoleiigth{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \(aiistl{% 

122 Xleftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p(S \@plus iXpQ XQminus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p(§ XOminus l\p@ 

126 \parsep 4.5\p@ \(§plus 2\p(§ XQminus l\p(§ > 

127 \def \(aiistii{% 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \adveince\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(Splus 2\p@ \@minus l\p(§ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \(§listiii{% 

135 Meftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p(a \@plus l\p@ \(§minus l\p@ 

139 \parsep Xz® 

140 \partopsep l\p@ \(§plus 0\p® \@minus l\p(§ 

141 \itemsep \topsep)- 

142 \def \(aiistiv-[% 

143 \setlength{\leftmargin}{\lef tmargini v>°/. 

144 \setlength{\labelwidth}{\lef tmarginiv}"/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \@listv{°/. 
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147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \setlength{\labelwidth}{\leftinarginv>°/. 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \@listvi{7. 

151 \setlength{\lef tmargiii}{\lef tinarginvi}°/o 

152 \setlength{\labelwidth}{\leftmarginvi}°/. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\(aiisti\(aiistl 
155 \®listi 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p® \@iniiius 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\pa} 

158 \setlength\intextsep{12\pQ \(§plus 2\p@ XOminus 2\p(§} 

159 \setlength\dblf loatsep{12\p(S \Qplus 2\p(a NQminus 2\p@} 

160 \setleiigth\dbltextf loatsep{20\p@ \@plus 2\p(§ \@minus 4\p(§} 

Separation on float pages 

161 \setlengtli\@fptop{0\p@ \(Splus If il> 

162 \setlength\@fpsep{8\p@ \(§plus 2f il} 

163 \setlength\@f pbot{0\p@ \@plus If il} 

164 \setlengtli\@dblf ptop{0\p@ \@plus Ifil} 

165 \setlengtli\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\(adblfpbot{0\pa \@plus Ifil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl2.clo>[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 

provided values: 6/7, 8/9, 9/10.5, 10/11.5, 11/12.5 12/13.5, 14/18, 17/22, 20/25, 
25/30. 



2 \renewcoimnand\normalsize{°/o 

3 \@setf ontsize\normalsize\@xiipt{13 . 5}% 

4 \abovedisplayskip ll\p@ \@plus 2\p@ \@miiius5\p@ 

5 \abovedisplayshortskip l\p@ \(3plus 3\p@ 

6 \belowdisplayshortskip 7\p@ \(§plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\(§listi\(§listl> 
9 \normalsize 

10 \iiewconunand\small{y„ 

11 \@setf ontsize\small\@xipt{12 . 5}% 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \@ininus4\p@ 

13 \abovedi splay short skip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \(§minus2\p(§ 

15 \def \@listi{\lef tmarginMef tmargini 

16 \topsep 4\p@ \@plus2\p@ \(§minus2\p(§ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}7o 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newconunand\f ootnotesize{°/o 

22 \@setf ontsizeXf ootnotesize\@xpt{ll . 5}% 

23 \abovedisplayskip 6\p@ \(§plus2\p(§ \@miiius4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \(§minus2\p(§ 

26 \def \@listi{\lef tmarginXlef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep Xparsep}"/, 

30 \belowdisplayskip \abovedisplayskip 
31} 

32 \newconunand\scriptsize{\@setf ontsize\scriptsize\@ixpt{10 . 5}}- 

33 \newcommand\little{\@setf oiitsize\little\@viiipt{9}} 

34 \newcominaiid\tiny{\@setf ontsize\tiny\@vipt\@viipt} 
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35 \newconimand\large{\@setf ontsize\large\@xivpt{18}} 

36 \newcommand\Large{\@setf oiitsize\Large\@xviipt{22}} 

37 \newcoimnand\LARGE{\@setfontsize\LARGE\@xxpt{25}} 

38 \newconmiaiid\huge{\@setf ontsize\huge\@xxvpt{30}} 

39 \newcominand\Huge{\@setf ontsize\Huge\(§xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the calcula- 
tions below easier. 

40 \setlength\hoff set{-lin} 

41 \setlength\vof f set-[-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight-Cl2\p@> 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep-[10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@iiiaxdepth\maxdepth 

51 \setlength\columnsep{12pt} 

52 \setlength\coliimnseprule{Opt} 

53 \setlength\fboxsep{3pt]- 

54 \setlength\fboxrule{.4pt]- 

1.3. Textheight and TEXTWIDTH 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, 
but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\idOboxheight 

56 \AtBeginDocuinent{yo 

57 \setlength\(§tempdima{\paperwidth}yo 

58 \addtolength\(§tempdima{-\textwidth}°/o 
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59 \divide\@tenipdinia by 2 

60 \setleiigth\Otempdimb\marginparwidth 

61 \addtoleiigth\@tempdimb\marginparsep 

62 \addtolength\@teiiipdimb{2pc}7o 

63 \ifdim XOtempdima <\@tempdimb 

64 \@settopoint\@tempdiinb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \striiig\inargiiiparwidth (\the\marginparwidth) too wide . \MessageBreaJi 

68 The allowed value for margin space: (\the\(§tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }% 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advaiice\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }% 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. This 
does not check for the correct placement of the identification line!! 

89 \setlength\(§tempdima{\paperheight3- 

90 \addtolength\Otempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima]- 

94 \addtolength\(§tempdima{-\textheight} 

95 \divide\(§tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\Otempdimb by -4pc 

98 \@settopoint\©tempdimb 



5 



99 \GenericError{Pointsize]-{Pointsize Error: Invalid sizes given}{}{You 

100 made your \striiig\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }7o 

104 \fi 

105 \ s et length\t opmargin{ \@t empdima} 

106 \setlength\id@boxheight{\@t empdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{12\p@ \@plus 4\p@ \(§minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \Ominus l\p@} 

112 \setlength{\lef tmargini}{2em]- 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiii}{l .87em} 

115 \setlength{\lef tmarginiv}{l . 7em} 

116 \setlength{\lef tmarginv}{lem]- 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep>{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth>{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def \(§listl{% 

122 Meftmargin \leftmargini 

123 \topsep ll\p@ \(§plus 3\p@ \@minus 5\p@ 

124 \partopsep 4.5\p@ \@plus l\p@ \Ominus 2\p0 

125 \itemsep 6\p@ \Oplus 2\p(§ \@minus l\p@ 

126 \parsep 6\p@ \@plus 2\p(§ \@minus l\p@ } 

127 \def \©listii{% 

128 Meftmargin \lef tmarginii 

129 Mabelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 6\p@ \Oplus 2\p0 \@minus l\p@ 

132 \parsep 3\p@ \@plus l\p(§ \@minus l\p@ 
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133 \itemsep \parsep} 

134 \def \®listiii{y. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p(§ \(§plus iXpO \(§niinus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p© \Ominus l\p© 

141 \itemsep \topsep} 

142 \def \@listiv{y. 

143 \setleiigth{\lef tmargin}{\lef tmarginiv}"/, 

144 \setlength{\labelwidth}{\lef tmarginiv}yo 

145 \addtolength{\labelwidth}{-\labelsep» 

146 \def \@listv{% 

147 \setlength{\lef tmargin}{\leftmarginv}yo 

148 \setlength-[\labelwidth}{\leftmarginv}°/o 

149 \addtolength{\labelwidth}{-\labelsep» 

150 \def \©listvi{°/. 

151 \setlength{\lef tniargin}{\leftmarginvi}°/o 

152 \setlength{\labelwidth>{\leftmarginvi>% 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\©listl 

155 \©listi 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@> 

157 \setleiigth\textf loatsep{24\p@ \@plus 2\p© \@iiiinus 4\p(a} 

158 \setleiigth\intextsep{12\p@ \@plus 2\p@ \@minus 2\p(3> 

159 \setlength\dblf loatsep{12\p@ \(§plus 2\p@ XOminus 2\p@} 

160 \setlength\dbltextf loatsep{24\p(§ \@plus 2\p@ \(§minus 4\p(§} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \(§plus If il> 

162 \setlength\0fpsep{10\p@ \Oplus 2f il> 

163 \setleiigth\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{10\p@ \@plus 2f il} 

166 \setlength\Odblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 



